home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / comm / net / AmiComSysMUI.lha / AmiComSys / rexx / Talk.rexx < prev   
OS/2 REXX Batch file  |  1998-01-25  |  581b  |  17 lines
  1. /* ARexx script to Talk someone */
  2. /* For use with AmiComSys 1.12+ */
  3. /* Talk must be in the AMITCP:bin directory */
  4. /* $VER talk.rexx 1.1 (15.1.1998) Håkan Parting */
  5. ADDRESS AMICOMSYS;
  6. OPTIONS RESULTS;
  7.  
  8. GET stem info. CLIENTLIST;
  9. /* "stem info." inserts the results to the structure 'info.'. */
  10. /* "var s" would have inserted all the results to one string in s. */
  11. /* "CLIENTLIST": We want to read the client list information. */
  12. s=info.selected;
  13. ADDRESS COMMAND 'rx AMITCP:bin/talk '||info.usernames.s||'@'||info.hostnames.s;
  14. /* Start the talk arexx script for AmTalk */
  15.  
  16. EXIT;
  17.